﻿<!--#include file="const.inc"-->
<%
'====================================================================
' 感谢使用晴天3G智能建站系统..
' 作者:梁永强.QQ:766750857
' 官方网址:wap.qt3g.com
' 声明:软件版权归作者所有,没有经过作者本人同意不得非法破解和传播本程序
'====================================================================
%>
<%
	dim rs,sql,listid,name,i
		listid=Request.QueryString("listid")
		if not isnumeric(listid) then listid=0
		if listid="" then listid=0
		listid=clng(listid)




	Set Rs = Server.CreateObject("Adodb.Recordset")
	Sql = "SELECT [name]  FROM [qingtian_bbs] where [del]=0 and [view]=0 and [id]="&listid
	Rs.Open Sql,conn,1,1
	if not (rs.bof and rs.eof)  then
		name=qingtian.utf8(rs("name"))
	end if
	Rs.close

select case v
case "0"
we0="<br/>"
%>
<card title="<%=name%>论坛版主"><p align="<%=qingtian.px%>">
<%
case "1"
hr=""
zi="<span style=""color:#FF5500"">"
zi0="</span>"
we="<div class=""footer"">"
sou="<div class=""block4"">"
dao="<div class=""navi"">"
we0="</div>"
%>
<title><%=name%>论坛版主</title>
</head>
<body>
<!--#include virtual="/css.inc"-->
<%

End Select

		if sid="Null" then
		%><%=dao%><%=zi%>欢迎你<%=zi0%><a href="login.asp?sid=<%=sidd%>&amp;url=/bbs/banzhu.asp?listid=<%=listid%>">注册/登陆</a><%=we0%><%
		else
		qingtian.info

		end if
%>
<%=qingtian.qingsav("31")%>
   <%



	Sql = "select  [nid],[class] from [qingtian_bbs_bz] where [del]=0 and [listid]="&listid&" order by [id] desc"
	Rs.Open Sql,conn,1,1
	if not (rs.bof and rs.eof)  then

		%><%=sou%>【<%=name%>版主】<%=we0%><%=we%><%

		For i=1 to rs.RecordCount
			If Rs.Eof Then
				exit For
			End If
		%>用户:<a href="../user/spacev.asp?nid=<%=rs("nid")%>&amp;sid=<%=sidd%>&amp;urls=<%=qingtian.wapurl%>"><%=qingtian.name(rs("nid"))%></a><br/>
			论坛:<%=name%><br/>
			权限:<%if rs("class")=true then%>
			[论坛副版主]<%=we0%>
			<%else%>
			[论坛版主]<%=we0%>
			<%end if%><%
		Rs.MoveNext
		Next
        else%>
	<%=we%>该版暂无版主<%=we0%>
 <%       
	end if
	Rs.close
	set rs=nothing
%>
<%=qingtian.qingsav("32")%>
<%=sou%><a href="board.asp?listid=<%=listid%>&amp;sid=<%=sidd%>">返回<%=name%></a><%=we0%><%
End Function
%>
